/*
This code generates eFigure 1: County MA growth versus benchmark cuts
*/

log using "$logs\eFig1.txt", replace text name(efig1)

use "$data_deri\enroll_panel", clear
keep if year==2019
merge 1:1 stcty using "$data_deri\ratedata_17"
list state county if _merge==2

gen pen_diff = penetration - penetration11

twoway scatter pen_diff bnch_cut_prop, xtitle("Benchmark Cut (Percent)") ytitle("Growth in MA Penetration (Percentage Point)") ytick(-40(5)40) msize(tiny) graphregion(color(white)) || lfit pen_diff bnch_cut_prop [aweight = eligibles11] ||, legend(off)

graph export "$output\eFig1.pdf", replace

log close efig1
